Imports Microsoft.VisualBasic

Namespace sk.DAL
    Public Class Category
        Sub New(ByVal ID As String, ByVal name As String)
            _CategoryID = ID
            _Name = name
        End Sub

        Sub New()

        End Sub

        Private _CategoryID As Integer
        Public Property CategoryID() As Integer
            Get
                Return _CategoryID
            End Get
            Set(ByVal value As Integer)
                _CategoryID = value
            End Set
        End Property


        Private _Name As String
        Public Property Name() As String
            Get
                Return _Name
            End Get
            Set(ByVal value As String)
                _Name = value
            End Set
        End Property
    End Class
End Namespace
